home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 November
/
EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso
/
earcd
/
program
/
misc
/
multicol.lha
/
MC
/
mc_bleed.c
< prev
next >
Wrap
C/C++ Source or Header
|
1995-10-02
|
7KB
|
258 lines
/******************************************************************************
** **
** MultiColor-Demo-Bleed **
** **
**---------------------------------------------------------------------------**
** V2.0 vom 01.10.95 **
******************************************************************************/
#include "sc:source/mc/multicolor.h"
/* Protos */
void OpenAll(void);
void CloseAll(void);
void Bleed(UWORD eg1,UWORD eg2,UWORD eg3,UWORD eg4);
void Usage(void);
/* defines */
extern struct ExecBase *SysBase;
struct IntuitionBase *IntuitionBase=0l;
struct GfxBase *GfxBase=0l;
struct Screen *scr=0l;
struct Window *win=0l;
MCHandle *mch=0l;
struct TagItem scrtags[]={
SA_Left, 0,
SA_Top, 0,
SA_Width, 0,
SA_Height, 0,
SA_Depth, 0,
SA_Colors, 0l,
SA_Type, CUSTOMSCREEN,
SA_DisplayID, PAL_MONITOR_ID,
TAG_DONE
};
struct TagItem wintags[]={
WA_Left, 0,
WA_Top, 0,
WA_Width, 0,
WA_Height, 0,
WA_IDCMP, IDCMP_MOUSEBUTTONS|IDCMP_RAWKEY,
WA_Flags, WFLG_SMART_REFRESH|WFLG_RMBTRAP|WFLG_BORDERLESS|WFLG_ACTIVATE,
WA_CustomScreen,0l,
TAG_DONE
};
/* Funktions */
void OpenAll(void)
{
// if(!(IntuitionBase=OpenLibrary("intuition.library",37))) CloseAll();
if(!(IntuitionBase=OpenLibrary("intuition.library",39))) CloseAll();
if(!(GfxBase=OpenLibrary("graphics.library",37))) CloseAll();
if(!(scr=OpenScreenTagList(0l,scrtags))) CloseAll();
wintags[6].ti_Data=scr;
if(!(win=OpenWindowTagList(0l,wintags))) CloseAll();
}
void CloseAll(void)
{
if(win) CloseWindow(win);
if(scr) CloseScreen(scr);
if(GfxBase) CloseLibrary(GfxBase);
if(IntuitionBase) CloseLibrary(IntuitionBase);
exit(0);
}
void Bleed(UWORD eg1,UWORD eg2,UWORD eg3,UWORD eg4)
{
struct IntuiMessage *imsg;
ULONG iclass;
USHORT icode;
register UBYTE quit=0;
register UWORD x,y;
MCPoint edge[4],akt,t1,t2;
MCPoint v1d,v1s,v2d,v2s,h1d,h1s;
// FILE *filer=0l,*fileg=0l,*fileb=0l;
// UBYTE color;
edge[0].r=(double)((eg1&0xF00)>>8)/16.0;edge[0].g=(double)((eg1&0x0F0)>>4)/16.0;edge[0].b=(double)(eg1&0x00F)/16.0;
edge[1].r=(double)((eg2&0xF00)>>8)/16.0;edge[1].g=(double)((eg2&0x0F0)>>4)/16.0;edge[1].b=(double)(eg2&0x00F)/16.0;
edge[2].r=(double)((eg3&0xF00)>>8)/16.0;edge[2].g=(double)((eg3&0x0F0)>>4)/16.0;edge[2].b=(double)(eg3&0x00F)/16.0;
edge[3].r=(double)((eg4&0xF00)>>8)/16.0;edge[3].g=(double)((eg4&0x0F0)>>4)/16.0;edge[3].b=(double)(eg4&0x00F)/16.0;
v1d.r=edge[3].r-edge[0].r;v1s.r=v1d.r/(double)mch->yres;
v1d.g=edge[3].g-edge[0].g;v1s.g=v1d.g/(double)mch->yres;
v1d.b=edge[3].b-edge[0].b;v1s.b=v1d.b/(double)mch->yres;
v2d.r=edge[2].r-edge[1].r;v2s.r=v2d.r/(double)mch->yres;
v2d.g=edge[2].g-edge[1].g;v2s.g=v2d.g/(double)mch->yres;
v2d.b=edge[2].b-edge[1].b;v2s.b=v2d.b/(double)mch->yres;
// filer=fopen("xh3:test.r","wb");
// fileg=fopen("xh3:test.g","wb");
// fileb=fopen("xh3:test.b","wb");
// if(filer && fileg && fileb)
// {
for(y=0;y<mch->yres;y++)
{
t1.r=edge[0].r+((double)y*v1s.r);
t1.g=edge[0].g+((double)y*v1s.g);
t1.b=edge[0].b+((double)y*v1s.b);
t2.r=edge[1].r+((double)y*v2s.r);
t2.g=edge[1].g+((double)y*v2s.g);
t2.b=edge[1].b+((double)y*v2s.b);
h1d.r=t2.r-t1.r;h1s.r=h1d.r/(double)mch->xres;
h1d.g=t2.g-t1.g;h1s.g=h1d.g/(double)mch->xres;
h1d.b=t2.b-t1.b;h1s.b=h1d.b/(double)mch->xres;
for(x=0;x<mch->xres;x++)
{
akt.r=t1.r+((double)x*h1s.r);
akt.g=t1.g+((double)x*h1s.g);
akt.b=t1.b+((double)x*h1s.b);
// color=(UBYTE)(255.0*akt.r);fwrite(&color,1,1,filer);
// color=(UBYTE)(255.0*akt.g);fwrite(&color,1,1,fileg);
// color=(UBYTE)(255.0*akt.b);fwrite(&color,1,1,fileb);
MC_PutPixel(mch,x,y,akt);
}
}
// fclose(fileb);
// fclose(fileg);
// fclose(filer);
// }
while(!quit)
{
WaitPort(win->UserPort);
while(imsg=GetMsg(win->UserPort))
{
iclass =imsg->Class;
icode =imsg->Code;
ReplyMsg(imsg);
switch(iclass)
{
case IDCMP_RAWKEY:
switch(icode)
{
case 0x45: /* ESC */
case 0x40: /* Space */
quit=1;break;
}
break;
}
}
}
}
void Usage(void)
{
printf("Usage \n");
printf("\tmc_bleed typ res\n");
printf("\tres\typ | 0=ECS | 1=AGA,GFX-Card\n");
printf("\t--------+-------+---------------\n");
printf("\t e (ehb)| 64 | - \n");
printf("\t l (low)| 32 | 256 \n");
printf("\t h (hi )| 16 | 256 \n");
printf("\t s (shi)| -- | 256 \n");
printf("\t--------+-------+---------------\n");
}
void main(int argc,char *argv[])
{
UBYTE dep,typ,fail=0;
char res;
UWORD eg1=0x0F0,eg2=0x0FF,eg3=0xF0F,eg4=0xFF0;
if(argc>=3)
{
typ=atoi(argv[1])&1;
res=argv[2][0];
if(argc>=4) eg1=atoi(argv[3]);
if(argc>=5) eg2=atoi(argv[4]);
if(argc>=6) eg3=atoi(argv[5]);
if(argc>=7) eg4=atoi(argv[6]);
switch(typ)
{
case 0: /* ECS */
switch(res)
{
case 'E':
case 'e':
scrtags[4].ti_Data=dep=6;
wintags[2].ti_Data=scrtags[2].ti_Data=354; /* 236 */
wintags[3].ti_Data=scrtags[3].ti_Data=552; /* 276 */
scrtags[7].ti_Data|=EXTRAHALFBRITELACE_KEY;
break;
case 'L':
case 'l':
scrtags[4].ti_Data=dep=5;
wintags[2].ti_Data=scrtags[2].ti_Data=354; /* 236 */
wintags[3].ti_Data=scrtags[3].ti_Data=552; /* 276 */
scrtags[7].ti_Data|=LORESLACE_KEY;
break;
case 'H':
case 'h':
scrtags[4].ti_Data=dep=4;
wintags[2].ti_Data=scrtags[2].ti_Data=708; /* 472 */
wintags[3].ti_Data=scrtags[3].ti_Data=552; /* 276 */
scrtags[7].ti_Data|=HIRESLACE_KEY;
break;
case 'S':
case 's':
fail=1;
break;
}
break;
case 1: /* AGA,GFX-Card */
switch(res)
{
case 'E':
case 'e':
fail=1;
break;
case 'L':
case 'l':
scrtags[4].ti_Data=dep=8;
wintags[2].ti_Data=scrtags[2].ti_Data=354; /* 236 */
wintags[3].ti_Data=scrtags[3].ti_Data=552; /* 276 */
scrtags[7].ti_Data|=LORESLACE_KEY;
break;
case 'H':
case 'h':
scrtags[4].ti_Data=dep=8;
wintags[2].ti_Data=scrtags[2].ti_Data=708; /* 472 */
wintags[3].ti_Data=scrtags[3].ti_Data=552; /* 276 */
scrtags[7].ti_Data|=HIRESLACE_KEY;
break;
case 'S':
case 's':
scrtags[4].ti_Data=dep=8;
wintags[2].ti_Data=scrtags[2].ti_Data=1416; /* 944 */
wintags[3].ti_Data=scrtags[3].ti_Data=552; /* 276 */
scrtags[7].ti_Data|=SUPERLACE_KEY;
break;
}
break;
}
if(!fail)
{
OpenAll();
if(mch=MC_Init(scr,win,dep))
{
Bleed(eg1,eg2,eg3,eg4);
MC_Free(mch);
}
}
else Usage();
}
else Usage();
CloseAll();
}